home *** CD-ROM | disk | FTP | other *** search
/ Aminet 1 (Walnut Creek) / Aminet - June 1993 [Walnut Creek].iso / ab20 / aplictns / analyclc.lzh / scifct.ftn < prev   
Text File  |  1990-08-22  |  366b  |  15 lines

  1. C SCIENTIFIC FUNCTION CALLER
  2. C This version is a dummy placeholder.
  3. C The SCIFCT subroutine exists to allow AnalytiCalc to call just
  4. C about *ANY* Fortran callable routine.
  5.     SUBROUTINE SCIFCT(LINE,RETCD)
  6.     INTEGER RETCD
  7.     CHARACTER*1 LINE(80)
  8.     RETCD=1
  9. C HANDLE *U STXXXX FUNCTIONS. LINE ARRAY PASSED IN HERE
  10. C STARTS AFTER THE "ST" SO WE CAN DECODE IT.
  11.     RETURN
  12.     END
  13.  
  14.  
  15.